home *** CD-ROM | disk | FTP | other *** search
/ Virtual Vivid 2 / Virtual Vivid 2.iso / VIRTUAL VIVID 2 Movie / ALL Slide Movie8 / ALL Slide Movie8.rsrc / BITD_1027 (.txt) < prev    next >
AmigaBASIC Source Code  |  1993-07-08  |  1KB  |  15 lines
  1.                                                                                                                                                                                                                                                                TO
  2. <0x7e><0x7f><0x1100696>=MKI$NOT=<0x7f><0x7f>>
  3. <0x7d><0x7f><0x11006a1><0x51>vpv<0x20>MKI$<0x7e><0x7e><0x7f>+
  4. &HffffMKD$NOTPUTpvFOR<0x20>PUTMKD$<0x20>MKI$labelffffeaff<0x7f>*
  5. <0x11006c1><0x7f><0x7f>INPUTvMKI$<0x20>vFORvvINPUT<0x7d>p
  6. MKI$<0x7e><0x7f>^
  7. <0x11006d5><0x7f>MKI$pINPUT<0x20>vINPUT<0x7e>v<0x11006df><0x20><0x20>vINPUTv<0x20>'<0x7e><0x7f>OR
  8. 4<0x7f><0x7f>pvvpINPUTpvINPUTTHEN<0x5f><0x20>pvFORvvINPUT><0x7f><0x7f>IMP
  9. 7
  10.  
  11. <0x7f>=vINPUTvINPUTv<0x20><0x4b>MKI$PRINT<0x7e>vpINPUTvpINPUTppMKI$<0x7f><0x7f>EQV
  12. 6<0x7f><0x7f>INPUTvFORvNOTCOMMON]42656vpvINPUTpvvp<0x20><0x7f><0x7f>EQV
  13. 5<0x7f>MKI$vv']<0x7d>}FORvINPUTvvINPUTpINPUTp<0x51><0x7f>EQV
  14. 255<0x7f>p<0x4b>],W]W,ATNMKD$vFORvv<0x1100766>FORvvpINPUTv<0x7f><0x7f>IMP
  15. 6<0x7f><0x60>INPUTMKD$323,323<0x51>INPUTvqINPUTvvGETINPUTvp=<0x7f>